3.15.63 \(\int \frac {A+B x}{\sqrt {d+e x} (2 A B d-A^2 e-B^2 e x^2)} \, dx\) [1463]

3.15.63.1 Optimal result
3.15.63.2 Mathematica [C] (verified)
3.15.63.3 Rubi [A] (verified)
3.15.63.4 Maple [A] (verified)
3.15.63.5 Fricas [A] (verification not implemented)
3.15.63.6 Sympy [F]
3.15.63.7 Maxima [F]
3.15.63.8 Giac [B] (verification not implemented)
3.15.63.9 Mupad [B] (verification not implemented)

3.15.63.1 Optimal result

Integrand size = 38, antiderivative size = 155 \[ \int \frac {A+B x}{\sqrt {d+e x} \left (2 A B d-A^2 e-B^2 e x^2\right )} \, dx=-\frac {\log \left (B d-A e-\sqrt {2} \sqrt {B} \sqrt {2 B d-A e} \sqrt {d+e x}+B (d+e x)\right )}{\sqrt {2} \sqrt {B} e \sqrt {2 B d-A e}}+\frac {\log \left (B d-A e+\sqrt {2} \sqrt {B} \sqrt {2 B d-A e} \sqrt {d+e x}+B (d+e x)\right )}{\sqrt {2} \sqrt {B} e \sqrt {2 B d-A e}} \]

output
-1/2*ln(B*d-A*e+B*(e*x+d)-2^(1/2)*B^(1/2)*(-A*e+2*B*d)^(1/2)*(e*x+d)^(1/2) 
)/e*2^(1/2)/B^(1/2)/(-A*e+2*B*d)^(1/2)+1/2*ln(B*d-A*e+B*(e*x+d)+2^(1/2)*B^ 
(1/2)*(-A*e+2*B*d)^(1/2)*(e*x+d)^(1/2))/e*2^(1/2)/B^(1/2)/(-A*e+2*B*d)^(1/ 
2)
 
3.15.63.2 Mathematica [C] (verified)

Result contains complex when optimal does not.

Time = 0.77 (sec) , antiderivative size = 252, normalized size of antiderivative = 1.63 \[ \int \frac {A+B x}{\sqrt {d+e x} \left (2 A B d-A^2 e-B^2 e x^2\right )} \, dx=\frac {-\frac {\left (-i \sqrt {A} \sqrt {e}+\sqrt {-2 B d+A e}\right ) \arctan \left (\frac {\sqrt {B} \sqrt {d+e x}}{\sqrt {-B d-i \sqrt {A} \sqrt {e} \sqrt {-2 B d+A e}}}\right )}{\sqrt {-B d-i \sqrt {A} \sqrt {e} \sqrt {-2 B d+A e}}}-\frac {\left (i \sqrt {A} \sqrt {e}+\sqrt {-2 B d+A e}\right ) \arctan \left (\frac {\sqrt {B} \sqrt {d+e x}}{\sqrt {-B d+i \sqrt {A} \sqrt {e} \sqrt {-2 B d+A e}}}\right )}{\sqrt {-B d+i \sqrt {A} \sqrt {e} \sqrt {-2 B d+A e}}}}{\sqrt {B} e \sqrt {-2 B d+A e}} \]

input
Integrate[(A + B*x)/(Sqrt[d + e*x]*(2*A*B*d - A^2*e - B^2*e*x^2)),x]
 
output
(-((((-I)*Sqrt[A]*Sqrt[e] + Sqrt[-2*B*d + A*e])*ArcTan[(Sqrt[B]*Sqrt[d + e 
*x])/Sqrt[-(B*d) - I*Sqrt[A]*Sqrt[e]*Sqrt[-2*B*d + A*e]]])/Sqrt[-(B*d) - I 
*Sqrt[A]*Sqrt[e]*Sqrt[-2*B*d + A*e]]) - ((I*Sqrt[A]*Sqrt[e] + Sqrt[-2*B*d 
+ A*e])*ArcTan[(Sqrt[B]*Sqrt[d + e*x])/Sqrt[-(B*d) + I*Sqrt[A]*Sqrt[e]*Sqr 
t[-2*B*d + A*e]]])/Sqrt[-(B*d) + I*Sqrt[A]*Sqrt[e]*Sqrt[-2*B*d + A*e]])/(S 
qrt[B]*e*Sqrt[-2*B*d + A*e])
 
3.15.63.3 Rubi [A] (verified)

Time = 0.42 (sec) , antiderivative size = 162, normalized size of antiderivative = 1.05, number of steps used = 6, number of rules used = 5, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.132, Rules used = {654, 1478, 25, 27, 1103}

Below are the steps used by Rubi to obtain the solution. The rule number used for the transformation is given above next to the arrow. The rules definitions used are listed below.

\(\displaystyle \int \frac {A+B x}{\sqrt {d+e x} \left (A^2 (-e)+2 A B d-B^2 e x^2\right )} \, dx\)

\(\Big \downarrow \) 654

\(\displaystyle 2 \int \frac {B d-A e-B (d+e x)}{e (d+e x)^2 B^2-2 d e (d+e x) B^2+e (B d-A e)^2}d\sqrt {d+e x}\)

\(\Big \downarrow \) 1478

\(\displaystyle 2 \left (-\frac {\int -\frac {\sqrt {2} \sqrt {2 B d-A e}-2 \sqrt {B} \sqrt {d+e x}}{\sqrt {B} \left (2 d-\frac {A e}{B}+e x-\frac {\sqrt {2} \sqrt {2 B d-A e} \sqrt {d+e x}}{\sqrt {B}}\right )}d\sqrt {d+e x}}{2 \sqrt {2} \sqrt {B} e \sqrt {2 B d-A e}}-\frac {\int -\frac {\sqrt {2} \left (\sqrt {2 B d-A e}+\sqrt {2} \sqrt {B} \sqrt {d+e x}\right )}{\sqrt {B} \left (2 d-\frac {A e}{B}+e x+\frac {\sqrt {2} \sqrt {2 B d-A e} \sqrt {d+e x}}{\sqrt {B}}\right )}d\sqrt {d+e x}}{2 \sqrt {2} \sqrt {B} e \sqrt {2 B d-A e}}\right )\)

\(\Big \downarrow \) 25

\(\displaystyle 2 \left (\frac {\int \frac {\sqrt {2} \sqrt {2 B d-A e}-2 \sqrt {B} \sqrt {d+e x}}{\sqrt {B} \left (2 d-\frac {A e}{B}+e x-\frac {\sqrt {2} \sqrt {2 B d-A e} \sqrt {d+e x}}{\sqrt {B}}\right )}d\sqrt {d+e x}}{2 \sqrt {2} \sqrt {B} e \sqrt {2 B d-A e}}+\frac {\int \frac {\sqrt {2} \left (\sqrt {2 B d-A e}+\sqrt {2} \sqrt {B} \sqrt {d+e x}\right )}{\sqrt {B} \left (2 d-\frac {A e}{B}+e x+\frac {\sqrt {2} \sqrt {2 B d-A e} \sqrt {d+e x}}{\sqrt {B}}\right )}d\sqrt {d+e x}}{2 \sqrt {2} \sqrt {B} e \sqrt {2 B d-A e}}\right )\)

\(\Big \downarrow \) 27

\(\displaystyle 2 \left (\frac {\int \frac {\sqrt {2} \sqrt {2 B d-A e}-2 \sqrt {B} \sqrt {d+e x}}{2 d-\frac {A e}{B}+e x-\frac {\sqrt {2} \sqrt {2 B d-A e} \sqrt {d+e x}}{\sqrt {B}}}d\sqrt {d+e x}}{2 \sqrt {2} B e \sqrt {2 B d-A e}}+\frac {\int \frac {\sqrt {2 B d-A e}+\sqrt {2} \sqrt {B} \sqrt {d+e x}}{2 d-\frac {A e}{B}+e x+\frac {\sqrt {2} \sqrt {2 B d-A e} \sqrt {d+e x}}{\sqrt {B}}}d\sqrt {d+e x}}{2 B e \sqrt {2 B d-A e}}\right )\)

\(\Big \downarrow \) 1103

\(\displaystyle 2 \left (\frac {\log \left (\sqrt {2} \sqrt {B} \sqrt {d+e x} \sqrt {2 B d-A e}-A e+B (d+e x)+B d\right )}{2 \sqrt {2} \sqrt {B} e \sqrt {2 B d-A e}}-\frac {\log \left (-\sqrt {2} \sqrt {B} \sqrt {d+e x} \sqrt {2 B d-A e}-A e+B (d+e x)+B d\right )}{2 \sqrt {2} \sqrt {B} e \sqrt {2 B d-A e}}\right )\)

input
Int[(A + B*x)/(Sqrt[d + e*x]*(2*A*B*d - A^2*e - B^2*e*x^2)),x]
 
output
2*(-1/2*Log[B*d - A*e - Sqrt[2]*Sqrt[B]*Sqrt[2*B*d - A*e]*Sqrt[d + e*x] + 
B*(d + e*x)]/(Sqrt[2]*Sqrt[B]*e*Sqrt[2*B*d - A*e]) + Log[B*d - A*e + Sqrt[ 
2]*Sqrt[B]*Sqrt[2*B*d - A*e]*Sqrt[d + e*x] + B*(d + e*x)]/(2*Sqrt[2]*Sqrt[ 
B]*e*Sqrt[2*B*d - A*e]))
 

3.15.63.3.1 Defintions of rubi rules used

rule 25
Int[-(Fx_), x_Symbol] :> Simp[Identity[-1]   Int[Fx, x], x]
 

rule 27
Int[(a_)*(Fx_), x_Symbol] :> Simp[a   Int[Fx, x], x] /; FreeQ[a, x] &&  !Ma 
tchQ[Fx, (b_)*(Gx_) /; FreeQ[b, x]]
 

rule 654
Int[((f_.) + (g_.)*(x_))/(Sqrt[(d_.) + (e_.)*(x_)]*((a_) + (c_.)*(x_)^2)), 
x_Symbol] :> Simp[2   Subst[Int[(e*f - d*g + g*x^2)/(c*d^2 + a*e^2 - 2*c*d* 
x^2 + c*x^4), x], x, Sqrt[d + e*x]], x] /; FreeQ[{a, c, d, e, f, g}, x]
 

rule 1103
Int[((d_) + (e_.)*(x_))/((a_.) + (b_.)*(x_) + (c_.)*(x_)^2), x_Symbol] :> S 
imp[d*(Log[RemoveContent[a + b*x + c*x^2, x]]/b), x] /; FreeQ[{a, b, c, d, 
e}, x] && EqQ[2*c*d - b*e, 0]
 

rule 1478
Int[((d_) + (e_.)*(x_)^2)/((a_) + (b_.)*(x_)^2 + (c_.)*(x_)^4), x_Symbol] : 
> With[{q = Rt[-2*(d/e) - b/c, 2]}, Simp[e/(2*c*q)   Int[(q - 2*x)/Simp[d/e 
 + q*x - x^2, x], x], x] + Simp[e/(2*c*q)   Int[(q + 2*x)/Simp[d/e - q*x - 
x^2, x], x], x]] /; FreeQ[{a, b, c, d, e}, x] && NeQ[b^2 - 4*a*c, 0] && EqQ 
[c*d^2 - a*e^2, 0] &&  !GtQ[b^2 - 4*a*c, 0]
 
3.15.63.4 Maple [A] (verified)

Time = 0.60 (sec) , antiderivative size = 197, normalized size of antiderivative = 1.27

method result size
pseudoelliptic \(-\frac {\frac {\left (A e B -\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}\right ) \operatorname {arctanh}\left (\frac {B \sqrt {e x +d}}{\sqrt {B^{2} d -\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}}}\right )}{\sqrt {B^{2} d -\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}}}-\frac {\left (A e B +\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}\right ) \operatorname {arctanh}\left (\frac {B \sqrt {e x +d}}{\sqrt {B^{2} d +\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}}}\right )}{\sqrt {B^{2} d +\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}}}}{e \sqrt {-A e \,B^{2} \left (A e -2 B d \right )}}\) \(197\)
derivativedivides \(-\frac {2 B^{2} \left (-\frac {\left (-A e B +\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}\right ) \operatorname {arctanh}\left (\frac {B \sqrt {e x +d}}{\sqrt {B^{2} d -\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}}}\right )}{2 B^{2} \sqrt {-A e \,B^{2} \left (A e -2 B d \right )}\, \sqrt {B^{2} d -\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}}}-\frac {\left (A e B +\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}\right ) \operatorname {arctanh}\left (\frac {B \sqrt {e x +d}}{\sqrt {B^{2} d +\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}}}\right )}{2 B^{2} \sqrt {-A e \,B^{2} \left (A e -2 B d \right )}\, \sqrt {B^{2} d +\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}}}\right )}{e}\) \(223\)
default \(-\frac {2 B^{2} \left (-\frac {\left (-A e B +\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}\right ) \operatorname {arctanh}\left (\frac {B \sqrt {e x +d}}{\sqrt {B^{2} d -\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}}}\right )}{2 B^{2} \sqrt {-A e \,B^{2} \left (A e -2 B d \right )}\, \sqrt {B^{2} d -\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}}}-\frac {\left (A e B +\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}\right ) \operatorname {arctanh}\left (\frac {B \sqrt {e x +d}}{\sqrt {B^{2} d +\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}}}\right )}{2 B^{2} \sqrt {-A e \,B^{2} \left (A e -2 B d \right )}\, \sqrt {B^{2} d +\sqrt {-A e \,B^{2} \left (A e -2 B d \right )}}}\right )}{e}\) \(223\)

input
int((B*x+A)/(-B^2*e*x^2-A^2*e+2*A*B*d)/(e*x+d)^(1/2),x,method=_RETURNVERBO 
SE)
 
output
-1/e/(-A*e*B^2*(A*e-2*B*d))^(1/2)*((A*e*B-(-A*e*B^2*(A*e-2*B*d))^(1/2))*ar 
ctanh(B*(e*x+d)^(1/2)/(B^2*d-(-A*e*B^2*(A*e-2*B*d))^(1/2))^(1/2))/(B^2*d-( 
-A*e*B^2*(A*e-2*B*d))^(1/2))^(1/2)-(A*e*B+(-A*e*B^2*(A*e-2*B*d))^(1/2))/(B 
^2*d+(-A*e*B^2*(A*e-2*B*d))^(1/2))^(1/2)*arctanh(B*(e*x+d)^(1/2)/(B^2*d+(- 
A*e*B^2*(A*e-2*B*d))^(1/2))^(1/2)))
 
3.15.63.5 Fricas [A] (verification not implemented)

Time = 0.30 (sec) , antiderivative size = 236, normalized size of antiderivative = 1.52 \[ \int \frac {A+B x}{\sqrt {d+e x} \left (2 A B d-A^2 e-B^2 e x^2\right )} \, dx=\left [\frac {\sqrt {2} \log \left (\frac {B^{2} e^{2} x^{2} + 8 \, B^{2} d^{2} - 6 \, A B d e + A^{2} e^{2} + 4 \, {\left (2 \, B^{2} d e - A B e^{2}\right )} x + \frac {2 \, \sqrt {2} {\left (4 \, B^{3} d^{2} - 4 \, A B^{2} d e + A^{2} B e^{2} + {\left (2 \, B^{3} d e - A B^{2} e^{2}\right )} x\right )} \sqrt {e x + d}}{\sqrt {2 \, B^{2} d - A B e}}}{B^{2} e x^{2} - 2 \, A B d + A^{2} e}\right )}{2 \, \sqrt {2 \, B^{2} d - A B e} e}, -\frac {\sqrt {2} \sqrt {-\frac {1}{2 \, B^{2} d - A B e}} \arctan \left (\frac {\sqrt {2} {\left (B e x + 2 \, B d - A e\right )} \sqrt {-\frac {1}{2 \, B^{2} d - A B e}}}{2 \, \sqrt {e x + d}}\right )}{e}\right ] \]

input
integrate((B*x+A)/(-B^2*e*x^2-A^2*e+2*A*B*d)/(e*x+d)^(1/2),x, algorithm="f 
ricas")
 
output
[1/2*sqrt(2)*log((B^2*e^2*x^2 + 8*B^2*d^2 - 6*A*B*d*e + A^2*e^2 + 4*(2*B^2 
*d*e - A*B*e^2)*x + 2*sqrt(2)*(4*B^3*d^2 - 4*A*B^2*d*e + A^2*B*e^2 + (2*B^ 
3*d*e - A*B^2*e^2)*x)*sqrt(e*x + d)/sqrt(2*B^2*d - A*B*e))/(B^2*e*x^2 - 2* 
A*B*d + A^2*e))/(sqrt(2*B^2*d - A*B*e)*e), -sqrt(2)*sqrt(-1/(2*B^2*d - A*B 
*e))*arctan(1/2*sqrt(2)*(B*e*x + 2*B*d - A*e)*sqrt(-1/(2*B^2*d - A*B*e))/s 
qrt(e*x + d))/e]
 
3.15.63.6 Sympy [F]

\[ \int \frac {A+B x}{\sqrt {d+e x} \left (2 A B d-A^2 e-B^2 e x^2\right )} \, dx=- \int \frac {A}{A^{2} e \sqrt {d + e x} - 2 A B d \sqrt {d + e x} + B^{2} e x^{2} \sqrt {d + e x}}\, dx - \int \frac {B x}{A^{2} e \sqrt {d + e x} - 2 A B d \sqrt {d + e x} + B^{2} e x^{2} \sqrt {d + e x}}\, dx \]

input
integrate((B*x+A)/(-B**2*e*x**2-A**2*e+2*A*B*d)/(e*x+d)**(1/2),x)
 
output
-Integral(A/(A**2*e*sqrt(d + e*x) - 2*A*B*d*sqrt(d + e*x) + B**2*e*x**2*sq 
rt(d + e*x)), x) - Integral(B*x/(A**2*e*sqrt(d + e*x) - 2*A*B*d*sqrt(d + e 
*x) + B**2*e*x**2*sqrt(d + e*x)), x)
 
3.15.63.7 Maxima [F]

\[ \int \frac {A+B x}{\sqrt {d+e x} \left (2 A B d-A^2 e-B^2 e x^2\right )} \, dx=\int { -\frac {B x + A}{{\left (B^{2} e x^{2} - 2 \, A B d + A^{2} e\right )} \sqrt {e x + d}} \,d x } \]

input
integrate((B*x+A)/(-B^2*e*x^2-A^2*e+2*A*B*d)/(e*x+d)^(1/2),x, algorithm="m 
axima")
 
output
-integrate((B*x + A)/((B^2*e*x^2 - 2*A*B*d + A^2*e)*sqrt(e*x + d)), x)
 
3.15.63.8 Giac [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 2994 vs. \(2 (128) = 256\).

Time = 1.20 (sec) , antiderivative size = 2994, normalized size of antiderivative = 19.32 \[ \int \frac {A+B x}{\sqrt {d+e x} \left (2 A B d-A^2 e-B^2 e x^2\right )} \, dx=\text {Too large to display} \]

input
integrate((B*x+A)/(-B^2*e*x^2-A^2*e+2*A*B*d)/(e*x+d)^(1/2),x, algorithm="g 
iac")
 
output
-(4*A*B^6*d^2*e^3 - 2*A^2*B^5*d*e^4 - 8*sqrt(2*A*B*d*e - A^2*e^2)*sqrt(-B^ 
2*d - sqrt(2*A*B*d*e - A^2*e^2)*B)*A*B^4*d^2*e^3 + 4*sqrt(2*A*B*d*e - A^2* 
e^2)*sqrt(-B^2*d - sqrt(2*A*B*d*e - A^2*e^2)*B)*A^2*B^3*d*e^4 - 4*sqrt(2*A 
*B*d*e - A^2*e^2)*sqrt(-B^2*d - sqrt(2*A*B*d*e - A^2*e^2)*B)*B^5*d^2*e^2 - 
 2*(2*A*B*d*e - A^2*e^2)*B^5*d*e^2 - sqrt(2*A*B*d*e - A^2*e^2)*sqrt(-B^2*d 
 - sqrt(2*A*B*d*e - A^2*e^2)*B)*B^5*d*e^2 - (8*A*B^4*d^2*e - 8*A^2*B^3*d*e 
^2 + 2*A^3*B^2*e^3 - 16*sqrt(2*A*B*d*e - A^2*e^2)*sqrt(-B^2*d - sqrt(2*A*B 
*d*e - A^2*e^2)*B)*A*B^2*d^2*e + 16*sqrt(2*A*B*d*e - A^2*e^2)*sqrt(-B^2*d 
- sqrt(2*A*B*d*e - A^2*e^2)*B)*A^2*B*d*e^2 - 4*sqrt(2*A*B*d*e - A^2*e^2)*s 
qrt(-B^2*d - sqrt(2*A*B*d*e - A^2*e^2)*B)*A^3*e^3 - 8*sqrt(2*A*B*d*e - A^2 
*e^2)*sqrt(-B^2*d - sqrt(2*A*B*d*e - A^2*e^2)*B)*B^3*d^2 + 4*sqrt(2*A*B*d* 
e - A^2*e^2)*sqrt(-B^2*d - sqrt(2*A*B*d*e - A^2*e^2)*B)*A*B^2*d*e - 4*(2*A 
*B*d*e - A^2*e^2)*B^3*d - 2*sqrt(2*A*B*d*e - A^2*e^2)*sqrt(-B^2*d - sqrt(2 
*A*B*d*e - A^2*e^2)*B)*B^3*d + 2*(2*A*B*d*e - A^2*e^2)*A*B^2*e + sqrt(2*A* 
B*d*e - A^2*e^2)*sqrt(-B^2*d - sqrt(2*A*B*d*e - A^2*e^2)*B)*A*B^2*e)*B^2*e 
^2 - (16*A*B^5*d^3*e^2 - 32*A^2*B^4*d^2*e^3 + 20*A^3*B^3*d*e^4 - 4*A^4*B^2 
*e^5 + 16*sqrt(-B^2*d - sqrt(2*A*B*d*e - A^2*e^2)*B)*A*B^4*d^3*e^2 - 32*sq 
rt(-B^2*d - sqrt(2*A*B*d*e - A^2*e^2)*B)*A^2*B^3*d^2*e^3 + 20*sqrt(-B^2*d 
- sqrt(2*A*B*d*e - A^2*e^2)*B)*A^3*B^2*d*e^4 - 4*sqrt(-B^2*d - sqrt(2*A*B* 
d*e - A^2*e^2)*B)*A^4*B*e^5 + 8*sqrt(-B^2*d - sqrt(2*A*B*d*e - A^2*e^2)...
 
3.15.63.9 Mupad [B] (verification not implemented)

Time = 0.32 (sec) , antiderivative size = 310, normalized size of antiderivative = 2.00 \[ \int \frac {A+B x}{\sqrt {d+e x} \left (2 A B d-A^2 e-B^2 e x^2\right )} \, dx=\frac {\sqrt {2}\,\left (\mathrm {atan}\left (\frac {\left (A\,e^2\,\sqrt {A\,B\,e-2\,B^2\,d}-2\,B\,d\,e\,\sqrt {A\,B\,e-2\,B^2\,d}\right )\,\left (\left (\frac {\sqrt {2}\,\left (\frac {2\,B^4\,d-2\,A\,B^3\,e}{e^2}-\frac {4\,A^2\,B^4\,e^4-8\,A\,B^5\,d\,e^3+4\,B^6\,d^2\,e^2}{e^4\,\left (2\,B^2\,d-A\,B\,e\right )}\right )}{\left (A\,e-B\,d\right )\,\left (A\,e-2\,B\,d\right )}+\frac {4\,\sqrt {2}\,A\,B^4}{e\,\left (2\,B^2\,d-A\,B\,e\right )\,\left (A\,e-B\,d\right )}\right )\,\sqrt {d+e\,x}-\frac {\sqrt {2}\,\left (\frac {2\,B^4}{e^2}-\frac {4\,B^6\,d}{e^2\,\left (2\,B^2\,d-A\,B\,e\right )}\right )\,{\left (d+e\,x\right )}^{3/2}}{\left (A\,e-B\,d\right )\,\left (A\,e-2\,B\,d\right )}\right )}{4\,A\,B^3}\right )-\mathrm {atan}\left (\frac {\sqrt {2}\,\sqrt {A\,B\,e-2\,B^2\,d}\,\sqrt {d+e\,x}}{2\,\left (A\,e-2\,B\,d\right )}\right )\right )}{e\,\sqrt {A\,B\,e-2\,B^2\,d}} \]

input
int(-(A + B*x)/((d + e*x)^(1/2)*(A^2*e + B^2*e*x^2 - 2*A*B*d)),x)
 
output
(2^(1/2)*(atan(((A*e^2*(A*B*e - 2*B^2*d)^(1/2) - 2*B*d*e*(A*B*e - 2*B^2*d) 
^(1/2))*(((2^(1/2)*((2*B^4*d - 2*A*B^3*e)/e^2 - (4*A^2*B^4*e^4 + 4*B^6*d^2 
*e^2 - 8*A*B^5*d*e^3)/(e^4*(2*B^2*d - A*B*e))))/((A*e - B*d)*(A*e - 2*B*d) 
) + (4*2^(1/2)*A*B^4)/(e*(2*B^2*d - A*B*e)*(A*e - B*d)))*(d + e*x)^(1/2) - 
 (2^(1/2)*((2*B^4)/e^2 - (4*B^6*d)/(e^2*(2*B^2*d - A*B*e)))*(d + e*x)^(3/2 
))/((A*e - B*d)*(A*e - 2*B*d))))/(4*A*B^3)) - atan((2^(1/2)*(A*B*e - 2*B^2 
*d)^(1/2)*(d + e*x)^(1/2))/(2*(A*e - 2*B*d)))))/(e*(A*B*e - 2*B^2*d)^(1/2) 
)